
'unit test for TTransition

Type TransitionTest Extends TTest

	Field t:TTransition
	
	Method After() {after}
		t = Null
	End Method
	
		
	Method IsComplete() {test}
		t = New TTransitionFadeIn
		assertFalse( t.IsComplete() )
		
		t._color._a = 0.0
		assertTrue( t.IsComplete())
	End Method
	
End Type